object Form1: TForm1 Left = 141 Top = 140 Width = 220 Height = 239 Caption = 'Form1' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] PixelsPerInch = 96 TextHeight = 13 object MemCtrl1: TMemCtrl Left = 8 Top = 8 Width = 102 Height = 134 MemShows = [TotalAddrSpace, TotalUncommitted, TotalCommitted, TotalAllocated, TotalFree, FreeSmall, FreeBig, Unused, Overhead, HeapErrorCode] Interval = 200 Polling = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] AutoSize = True end object LED1: TLED Left = 172 Top = 112 Width = 21 Color = Green ColorExt = none StatusExt = False Size = lsNormal Shine = True Blink = False BlinkRate = 500 BlinkExt = False CapRight = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] LineSpace = 1.000000000000000000 Invert = False end object BitBtn1: TBitBtn Left = 8 Top = 148 Width = 75 Height = 25 Caption = 'GetMem' TabOrder = 0 OnClick = BitBtn1Click end object BitBtn2: TBitBtn Left = 82 Top = 148 Width = 75 Height = 25 Caption = 'FreeMem' TabOrder = 1 OnClick = BitBtn2Click end object StopTime1: TStopTime Left = 148 Top = 44 end object CDEvents1: TCDEvents Left = 144 Top = 92 end end